home *** CD-ROM | disk | FTP | other *** search
/ SGI Developer Toolbox 6.1 / SGI Developer Toolbox 6.1 - Disc 4.iso / src / tutorials / geometer / Theorems / theorems / orthic.T < prev    next >
Encoding:
Text File  |  1994-08-02  |  1.2 KB  |  34 lines
  1. .geometry "version 0.1";
  2. v1 = .free(-0.483696, -0.027174, "1");
  3. v2 = .free(-0.008152, 0.043478, "2");
  4. v3 = .free(-0.269022, 0.415761, "3");
  5. l1 = .l.vv(v1, v2);
  6. l2 = .l.vv(v2, v3);
  7. l3 = .l.vv(v3, v1);
  8. l4 = .l.vlperp(v2, l3, .invisible);
  9. l5 = .l.vlperp(v1, l2, .invisible);
  10. l6 = .l.vlperp(v3, l1, .invisible);
  11. v4 = .v.ll(l6, l1, .plus);
  12. v5 = .v.ll(l5, l2, .plus);
  13. v6 = .v.ll(l4, l3, .plus);
  14. l7 = .l.vv(v4, v5, .red, .longline);
  15. l8 = .l.vv(v5, v6, .red, .longline);
  16. l9 = .l.vv(v6, v4, .red, .longline);
  17. c1 = .c.vvv(v3, v2, v1, .red);
  18. v7 = .v.vvmid(v3, v2, .invisible, .plus);
  19. v8 = .v.vvmid(v2, v1, .invisible, .plus);
  20. l10 = .l.vlperp(v7, l2, .invisible);
  21. l11 = .l.vlperp(v8, l1, .invisible);
  22. v9 = .v.ll(l11, l10, .invisible, .plus);
  23. l12 = .l.vv(v9, v2, .green, .ray12);
  24. l13 = .l.vv(v9, v3, .green, .ray12);
  25. l14 = .l.vv(v9, v1, .green, .ray12);
  26. .text("Orthic Triangle:");
  27. .text("");
  28. .text("The orthic triangle is the triangle fromed from the bases of");
  29. .text("the feet of the altitudes of a triangle.  In the figure, the");
  30. .text("orthic triangle of the triangle 123 is in red.  The radii of");
  31. .text("the circumscribed circle about 123 passing through the vertices");
  32. .text("are perpendicular to the corresponding sides of the orthic");
  33. .text("triangle.");
  34.